﻿Public Class phukienno
    Private _mapk As String
    Private _tenpk As String
    Private _donvitinh As String
    Private _giathanh As Single
    Public Property Mapk() As String
        Get
            Return _mapk
        End Get
        Set(ByVal value As String)
            _mapk = value
        End Set
    End Property
    Public Property Tenpk() As String
        Get
            Return _tenpk
        End Get
        Set(ByVal value As String)
            _tenpk = value
        End Set
    End Property
    Public Property Donvitinh() As String
        Get
            Return _donvitinh
        End Get
        Set(ByVal value As String)
            _donvitinh = value
        End Set
    End Property
    Public Property Giathanh() As Single
        Get
            Return _giathanh
        End Get
        Set(ByVal value As Single)
            _giathanh = value
        End Set
    End Property
    Public Sub New(ByVal mapk As String, ByVal tenpk As String, ByVal giathanh As Single, ByVal donvitinh As String)
        Me._mapk = mapk
        Me._tenpk = tenpk
        Me._donvitinh = donvitinh
        Me._giathanh = giathanh
    End Sub
End Class
